; Music of Peter Packrat (1988) (Firebird)
; Ripped by Megachur the 15/11/2008

	write "PETERPAC.BIN"

music_date_rip	equ &0fb8
music_adr	equ &94f9
first_theme	equ 1	; 1 -> 3
last_theme	equ 3

	read "music_header_v1_0.asm"

;
.init_music
;
	ld hl,l955c
	ld (hl),#01
	ld (l9a0e),a
.l9501
	ld a,(l9a0e)
	dec a
	jp nz,l951d
	ld hl,l9ad7
	ld (l9570),hl
	ld hl,l9bad
	ld (l96a1),hl
	ld hl,l9c4a
	ld (l97af),hl
	jp l954c
.l951d
	dec a
	jp nz,l9536
	ld hl,l9ee4
	ld (l9570),hl
	ld hl,l9f38
	ld (l96a1),hl
	ld hl,l9f75
	ld (l97af),hl
	jp l954c
.l9536
	dec a
	jp nz,l954c
	ld hl,l9f9e
	ld (l9570),hl
	ld hl,l9fb4
	ld (l96a1),hl
	ld hl,l9fcc
	ld (l97af),hl
.l954c
	ld a,#01
	ld (l9567),a
	ld (l9698),a
	ld (l97a6),a
	ld (l9682),a
	ret
;
.play_music
;
.l955c equ $ + 1
	ld a,#00
	or a
	ret z
	call l9566
;	ld (#001d),a	modified by Megachur
	defs 3,0
	ret
.l9567 equ $ + 1
.l9566
	ld a,#00
	dec a
	ld (l9567),a
	jp nz,l9681
.l9570 equ $ + 1
	ld hl,#0000
.l9572
	ld a,(hl)
	inc hl
	and a
	jr z,l9501
	cp #01
	jr nz,l9589
.l957c equ $ + 1
	ld a,#00
	dec a
	jr z,l9572
	ld (l957c),a
	ld hl,(l99f7)
	jp l9572
.l9589
	cp #02
	jr nz,l9598
	ld a,(hl)
	inc hl
	ld (l957c),a
	ld (l99f7),hl
	jp l9572
.l9598
	cp #03
	jr nz,l95cd
	ld a,#08
	ld c,(hl)
	call l99cc
	ld a,(hl)
	ld (l9875),a
	ld (l99f4),a
	ld (l99fd),a
	inc hl
	ld a,(hl)
	ld (l987c),a
	ld (l9884),a
	inc hl
	ld a,(hl)
	ld (l989c),a
	ld (l98a4),a
	ld (l98a9),a
	inc hl
	ld a,(hl)
	ld (l98b9),a
	inc hl
	ld a,(hl)
	ld (l98c1),a
	inc hl
	jp l9572
.l95cd
	cp #04
	jr nz,l95d8
	xor a
	ld (l9669),a
	jp l9572
.l95d8
	cp #05
	jr nz,l95e4
	ld a,#01
	ld (l9669),a
	jp l9572
.l95e4
	cp #06
	jr nz,l95f3
	ld a,(hl)
	ld (l996a),a
	ld (l967d),a
	inc hl
	jp l9572
.l95f3
	cp #09
	jp nz,l9600
	ld a,(hl)
	ld (l962f),a
	inc hl
	jp l9572
.l9600
	cp #0a
	jp nz,l9611
	ld e,(hl)
	inc hl
	ld d,(hl)
	inc hl
	ld (l9a02),hl
	push de
	pop hl
	jp l9572
.l9611
	cp #0b
	jp nz,l961c
	ld hl,(l9a02)
	jp l9572
.l961c
	cp #0c
	jp nz,l962e
	ld a,(hl)
	inc hl
	ld (l964e),a
	ld a,(hl)
	inc hl
	ld (l9995),a
	jp l9572
.l962f equ $ + 1
.l962e
	add #00
	add #07
	ld (l9a08),a
	ld e,a
	ld a,(hl)
	ld (l9567),a
	inc hl
	ld (l9570),hl
	ld d,#00
	ld hl,l99ff
	add hl,de
	add hl,de
	ld d,(hl)
	inc hl
	ld e,(hl)
	ld (l9a0a),de
	ex de,hl
.l964e equ $ + 1
	ld a,#00
	ld (l998e),a
	ld e,a
	ld d,#00
	add hl,de
	ld (l9a0c),hl
	xor a
	ld c,l
	call l99cc
	ld a,h
	ld (l9986),a
	ld a,#01
	ld c,h
	call l99cc
.l9669 equ $ + 1
	ld a,#00
	dec a
	jr nz,l9681
	ld a,(l99fd)
	ld (l99f4),a
	ld (l9875),a
	ld a,(l98a4)
	ld (l98a9),a
.l967d equ $ + 1
	ld a,#00
	ld (l996a),a
.l9682 equ $ + 1
.l9681
	ld a,#00
	dec a
	jp z,l9697
	ld (l9682),a
	dec a
	jp nz,l9697
	ld a,(l9a00)
	ld c,a
	ld a,#07
	call l99cc
.l9698 equ $ + 1
.l9697
	ld a,#00
	dec a
	ld (l9698),a
	jp nz,l97a5
.l96a1 equ $ + 1
	ld hl,#0000
.l96a3
	ld a,(hl)
	inc hl
	and a
	jp z,l9501
	cp #01
	jr nz,l96bb
.l96ae equ $ + 1
	ld a,#00
	dec a
	jr z,l96a3
	ld (l96ae),a
	ld hl,(l99f9)
	jp l96a3
.l96bb
	cp #02
	jr nz,l96ca
	ld a,(hl)
	inc hl
	ld (l96ae),a
	ld (l99f9),hl
	jp l96a3
.l96ca
	cp #03
	jr nz,l96f7
	ld a,#09
	ld c,(hl)
	call l99cc
	ld a,c
	ld (l98da),a
	ld (l99f5),a
	ld (l99fe),a
	inc hl
	ld a,(hl)
	ld (l98e1),a
	ld (l98ea),a
	inc hl
	ld a,(hl)
	ld (l9902),a
	ld (l990b),a
	inc hl
	ld a,(hl)
	ld (l991b),a
	inc hl
	jp l96a3
.l96f7
	cp #04
	jr nz,l9702
	xor a
	ld (l9798),a
	jp l96a3
.l9702
	cp #05
	jr nz,l970e
	ld a,#01
	ld (l9798),a
	jp l96a3
.l970e
	cp #07
	jr nz,l9727
	ld a,(hl)
	ld (l9a00),a
	ld c,a
	ld a,#07
	inc hl
	call l99cc
	ld a,#06
	ld c,(hl)
	inc hl
	call l99cc
	jp l96a3
.l9727
	cp #08
	jp nz,l9738
	ld a,(hl)
	inc hl
	inc a
	ld (l9682),a
	ld (l9a01),a
	jp l96a3
.l9738
	cp #09
	jp nz,l9745
	ld a,(hl)
	ld (l9762),a
	inc hl
	jp l96a3
.l9745
	cp #0a
	jp nz,l9756
	ld e,(hl)
	inc hl
	ld d,(hl)
	inc hl
	ld (l9a04),hl
	push de
	pop hl
	jp l96a3
.l9756
	cp #0b
	jp nz,l9761
	ld hl,(l9a04)
	jp l96a3
.l9762 equ $ + 1
.l9761
	add #00
	add #07
	ld e,a
	ld a,(hl)
	ld (l9698),a
	inc hl
	ld (l96a1),hl
	ld d,#00
	ld hl,l99ff
	add hl,de
	add hl,de
	ld a,#03
	ld c,(hl)
	call l99cc
	ld a,#02
	inc hl
	ld c,(hl)
	call l99cc
	ld a,(l9a01)
	ld (l9682),a
	dec a
	jp z,l9797
	ld a,(l9a00)
	sub #20
	ld c,a
	ld a,#07
	call l99cc
.l9798 equ $ + 1
.l9797
	ld a,#00
	dec a
	jr nz,l97a5
	ld a,(l99fe)
	ld (l99f5),a
	ld (l98da),a
.l97a6 equ $ + 1
.l97a5
	ld a,#00
	dec a
	ld (l97a6),a
	jp nz,l9874
.l97af equ $ + 1
	ld hl,#0000
.l97b1
	ld a,(hl)
	inc hl
	and a
	jp z,l9501
	cp #01
	jr nz,l97c9
.l97bc equ $ + 1
	ld a,#00
	dec a
	jr z,l97b1
	ld (l97bc),a
	ld hl,(l99fb)
	jp l97b1
.l97c9
	cp #02
	jr nz,l97d8
	ld a,(hl)
	inc hl
	ld (l97bc),a
	ld (l99fb),hl
	jp l97b1
.l97d8
	cp #03
	jr nz,l9805
	ld a,#0a
	ld c,(hl)
	call l99cc
	ld a,(hl)
	ld (l9922),a
	ld (l99f6),a
	ld (l99ff),a
	inc hl
	ld a,(hl)
	ld (l9929),a
	ld (l9932),a
	inc hl
	ld a,(hl)
	ld (l994a),a
	ld (l9953),a
	inc hl
	ld a,(hl)
	ld (l9963),a
	inc hl
	jp l97b1
.l9805
	cp #04
	jr nz,l9810
	xor a
	ld (l9867),a
	jp l97b1
.l9810
	cp #05
	jr nz,l981c
	ld a,#01
	ld (l9867),a
	jp l97b1
.l981c
	cp #09
	jp nz,l9829
	ld a,(hl)
	ld (l9846),a
	inc hl
	jp l97b1
.l9829
	cp #0a
	jp nz,l983a
	ld e,(hl)
	inc hl
	ld d,(hl)
	inc hl
	ld (l9a06),hl
	push de
	pop hl
	jp l97b1
.l983a
	cp #0b
	jp nz,l9845
	ld hl,(l9a06)
	jp l97b1
.l9846 equ $ + 1
.l9845
	add #00
	add #07
	ld e,a
	ld a,(hl)
	ld (l97a6),a
	inc hl
	ld (l97af),hl
	ld d,#00
	ld hl,l99ff
	add hl,de
	add hl,de
	ld a,#05
	ld c,(hl)
	call l99cc
	ld a,#04
	inc hl
	ld c,(hl)
	call l99cc
.l9867 equ $ + 1
	ld a,#00
	dec a
	jr nz,l9874
	ld a,(l99ff)
	ld (l99f6),a
	ld (l9922),a
.l9875 equ $ + 1
.l9874
	ld a,#00
	cp #0d
	jp z,l989b
.l987c equ $ + 1
	ld a,#00
	dec a
	ld (l987c),a
	jr nz,l98c0
.l9884 equ $ + 1
	ld a,#00
	ld (l987c),a
	ld a,(l99f4)
	inc a
	ld (l99f4),a
	ld (l9875),a
	ld c,a
	ld a,#08
	call l99cc
	jp l98c0
.l989c equ $ + 1
.l989b
	ld a,#00
	dec a
	ld (l989c),a
	jr nz,l98c0
.l98a4 equ $ + 1
	ld a,#00
	ld (l989c),a
.l98a9 equ $ + 1
	ld a,#00
	ld (l989c),a
	ld a,(l99f4)
	dec a
	ld c,a
	ld a,#08
	call l99cc
	ld a,c
.l98b9 equ $ + 1
	cp #00
	jp z,l98c0
	ld (l99f4),a
.l98c1 equ $ + 1
.l98c0
	ld a,#00
	and a
	jr z,l98d9
	ld b,a
	ld a,(l9567)
	cp b
	jr nz,l98d9
	ld a,#0d
	ld (l9875),a
	ld a,#01
	ld (l989c),a
	ld (l98a9),a
.l98da equ $ + 1
.l98d9
	ld a,#00
	cp #0d
	jp z,l9901
.l98e1 equ $ + 1
	ld a,#00
	dec a
	ld (l98e1),a
	jp nz,l9921
.l98ea equ $ + 1
	ld a,#00
	ld (l98e1),a
	ld a,(l99f5)
	inc a
	ld (l99f5),a
	ld (l98da),a
	ld c,a
	ld a,#09
	call l99cc
	jp l9921
.l9902 equ $ + 1
.l9901
	ld a,#00
	dec a
	ld (l9902),a
	jp nz,l9921
.l990b equ $ + 1
	ld a,#00
	ld (l9902),a
	ld a,(l99f5)
	dec a
	ld c,a
	ld a,#09
	call l99cc
	ld a,c
.l991b equ $ + 1
	cp #00
	jr z,l9921
	ld (l99f5),a
.l9922 equ $ + 1
.l9921
	ld a,#00
	cp #0d
	jp z,l9949
.l9929 equ $ + 1
	ld a,#00
	dec a
	ld (l9929),a
	jp nz,l9969
.l9932 equ $ + 1
	ld a,#00
	ld (l9929),a
	ld a,(l99f6)
	inc a
	ld (l99f6),a
	ld (l9922),a
	ld c,a
	ld a,#0a
	call l99cc
	jp l9969
.l994a equ $ + 1
.l9949
	ld a,#00
	dec a
	ld (l994a),a
	jp nz,l9969
.l9953 equ $ + 1
	ld a,#00
	ld (l994a),a
	ld a,(l99f6)
	dec a
	ld c,a
	ld a,#0a
	call l99cc
	ld a,c
.l9963 equ $ + 1
	cp #00
	jr z,l9969
	ld (l99f6),a
.l996a equ $ + 1
.l9969
	ld a,#00
	dec a
	ld (l996a),a
	jr nz,l998d
	inc a
	ld (l996a),a
	ld hl,l99ec
.l9979 equ $ + 1
	ld a,#00
	inc a
	and #07
	ld (l9979),a
	ld e,a
	ld d,#00
	add hl,de
	ld a,(hl)
.l9986 equ $ + 1
	add #00
	ld c,a
	ld a,#01
	call l99cc
.l998e equ $ + 1
.l998d
	ld a,#00
	cp #00
	jp z,l99c3
.l9995 equ $ + 1
	ld e,#00
	ld d,#00
	ld hl,(l9a0c)
	and a
	sbc hl,de
	ld (l9a0c),hl
	xor a
	ld c,l
	call l99cc
	ld a,h
	ld (l9986),a
	ld c,a
	ld a,#01
	call l99cc
	and a
	ld de,(l9a0a)
	sbc hl,de
	ld a,h
	or l
	jp nz,l99c3
	xor a
	ld (l998e),a
	ld (l964e),a
.l99c3
	ret
	xor a
	ld (l955c),a
	ld a,#07
	ld c,#3f
.l99cc
	push bc
	ld b,#f4
	out (c),a
	ld b,#f6
	in a,(c)
	or #c0
	out (c),a
	and #3f
	out (c),a
	ld b,#f4
	out (c),c
	ld b,#f6
	ld c,a
	or #80
	out (c),a
	out (c),c
	pop bc
	ret
.l99ec
	inc bc
.l99f4 equ $ + 7
	db #01,#ff,#fd,#fd,#ff,#01,#03,#00
.l99fb equ $ + 6
.l99f9 equ $ + 4
.l99f7 equ $ + 2
.l99f6 equ $ + 1
.l99f5
	db #00,#00,#00,#00,#00,#00,#00,#00
.l9a04 equ $ + 7
.l9a02 equ $ + 5
.l9a01 equ $ + 4
.l9a00 equ $ + 3
.l99ff equ $ + 2
.l99fe equ $ + 1
.l99fd
	db #00,#00,#00,#00,#00,#00,#00,#00
.l9a0c equ $ + 7
.l9a0a equ $ + 5
.l9a08 equ $ + 3
.l9a06 equ $ + 1
	db #00,#00,#00,#00,#00,#00,#00,#00
.l9a0e equ $ + 1
	db #00,#00
	dw #ee0e,#180e,#4d0d,#8e0c
	dw #da0b,#2f0b,#8f0a,#f709
	dw #6809,#e108,#6108,#e907
	dw #7707,#0c07,#a706,#4706
	dw #ed05,#9805,#4705,#fc04
	dw #b404,#7004,#3104,#f403
	dw #bc03,#8603,#5303,#2403
	dw #f602,#cc02,#a402,#7e02
	dw #5a02,#3802,#1802,#fa01
	dw #de01,#c301,#aa01,#9201
	dw #7b01,#6601,#5201,#3f01
	dw #2d01,#1c01,#0c01,#fd00
	dw #ef00,#e100,#d500,#c900
	dw #be00,#b300,#a900,#9f00
	dw #9600,#8e00,#8600,#7f00
	dw #7700,#7100,#6a00,#6400
	dw #5f00,#5900,#5400,#5000
	dw #4b00,#4700,#4300,#3f00
	dw #3c00,#3800,#3500,#3200
	dw #2f00,#2d00,#2a00,#2800
	dw #2600,#2400,#2200,#2000
	dw #1e00,#1c00,#1b00,#1900
	dw #1800,#1600,#1500,#1400
	dw #1300,#1200,#1100,#1000
	db #00
	djnz l9ad2
.l9ad2
	djnz l9ad4
.l9ad4
	djnz l9ad6
.l9ad7 equ $ + 1
.l9ad6
	djnz l9ade
.l9ade equ $ + 6
	db #00,#09,#0c,#03,#06,#01,#00
	db #01,#05,#05,#0a
	db #f7,#9d
	db #46,#06,#49,#0c,#0c,#00,#00,#4b
	db #06,#49,#0c,#47,#0c,#46,#0c,#47
	db #0c,#46,#0c,#44,#12,#42,#0c,#44
	db #06,#42,#06,#46,#06,#42,#12,#3d
	db #18,#04,#3d,#18,#05,#3b,#12,#3d
	db #06,#40,#0c,#42,#0c,#44,#18,#0c
	db #0a,#01,#47,#18,#0c,#00,#00,#46
	db #12,#46,#06,#48,#06,#46,#12,#0c
	db #0a,#01,#4a,#18,#04,#4a,#18,#05
	db #09,#fd,#02,#02,#0a,#f7,#9d,#4d
	db #06,#01,#03,#0c,#01,#04,#07,#00
	db #05,#09,#00,#0a,#f7,#9d,#47,#06
	db #09,#f4,#0c,#07,#01,#49,#15,#0c
	db #00,#00,#4b,#07,#49,#0e,#47,#0e
	db #0c,#05,#01,#46,#15,#0c,#00,#00
	db #47,#07,#46,#0e,#44,#0e,#0c,#05
	db #01,#42,#15,#0c,#00,#00,#44,#07
	db #46,#0e,#42,#0e,#0c,#07,#01,#3d
	db #1c,#04,#3d,#1c,#05,#3e,#15,#0c
	db #00,#00,#40,#07,#43,#0e,#45,#0e
	db #47,#1c,#0c,#07,#01,#4a,#1c,#0c
	db #00,#00,#49,#15,#49,#07,#4b,#0e
	db #49,#0e,#0c,#0a,#01,#4d,#1c,#04
	db #4d,#1c,#05,#02,#02,#0a,#f7,#9d
	db #09,#00,#04,#47,#06,#05,#01,#00
.l9bad
	db #03,#00,#00,#00,#00,#04,#07,#3c
	db #0f,#08,#01,#32,#00,#32,#80,#05
	db #09,#00,#03,#0c,#01,#05,#00,#07
	db #38,#05,#1e,#18,#1d,#18,#1b,#18
	db #19,#18,#17,#18,#16,#18,#14,#12
	db #14,#06,#12,#0c,#11,#0c,#10,#18
	db #14,#18,#17,#18,#1c,#12,#1c,#06
	db #1b,#18,#18,#18,#16,#18,#1a,#18
	db #09,#fd,#02,#02,#0a,#51,#9e,#01
	db #09,#00,#0a,#51,#9e,#1e,#1c,#1d
	db #1c,#1b,#1c,#1a,#1c,#19,#1c,#18
	db #1c,#17,#1c,#16,#1c,#15,#1c,#21
	db #1c,#15,#1c,#1c,#1c,#02,#02,#0d
	db #0e,#14,#0e,#19,#0e,#14,#0e,#01
	db #03,#0c,#01,#03,#00,#0a,#51,#9e
	db #1e,#18,#1d,#18,#1b,#18,#19,#18
	db #17,#18,#16,#18,#14,#12,#14,#06
	db #12,#0c,#12,#0c,#13,#18,#17,#18
	db #1a,#18,#1f,#12,#1f,#06,#1e,#18
.l9c4a equ $ + 5
	db #1b,#18,#19,#30,#00,#03,#00,#00
	db #00,#00,#05,#32,#00,#32,#00,#32
	db #00,#03,#0c,#01,#03,#00,#02,#02
	db #09,#09,#0a,#78,#9e,#09,#04,#0a
	db #78,#9e,#09,#06,#0a,#93,#9e,#09
	db #01,#0a,#93,#9e,#09,#02,#0a,#78
	db #9e,#09,#fd,#0a,#78,#9e,#09,#02
	db #0a,#78,#9e,#09,#09,#0a,#78,#9e
	db #09,#0a,#0a,#78,#9e,#09,#0a,#0a
	db #78,#9e,#09,#0a,#0a,#78,#9e,#09
	db #0a,#0a,#78,#9e,#09,#02,#0a,#78
	db #9e,#09,#02,#0a,#78,#9e,#09,#04
	db #0a,#78,#9e,#09,#04,#0a,#78,#9e
	db #01,#09,#0c,#0a,#ae,#9e,#09,#07
	db #0a,#ae,#9e,#09,#09,#0a,#c9,#9e
	db #09,#04,#0a,#c9,#9e,#09,#05,#0a
	db #ae,#9e,#09,#00,#0a,#ae,#9e,#09
	db #05,#0a,#ae,#9e,#09,#0c,#0a,#ae
	db #9e,#09,#0d,#0a,#ae,#9e,#09,#0d
	db #0a,#ae,#9e,#09,#0d,#0a,#ae,#9e
	db #09,#0d,#0a,#ae,#9e,#09,#05,#0a
	db #ae,#9e,#09,#05,#0a,#ae,#9e,#09
	db #07,#0a,#ae,#9e,#09,#07,#0a,#ae
	db #9e,#03,#0b,#00,#00,#00,#09,#0c
	db #3a,#04,#3d,#04,#42,#04,#46,#04
	db #3a,#04,#3d,#04,#42,#04,#41,#04
	db #42,#04,#46,#04,#49,#04,#41,#04
	db #42,#04,#46,#04,#3a,#04,#3f,#04
	db #42,#04,#46,#04,#3a,#04,#3f,#04
	db #42,#04,#3e,#04,#42,#04,#46,#04
	db #4a,#04,#3e,#04,#42,#04,#46,#04
	db #3d,#04,#42,#04,#46,#04,#49,#04
	db #3d,#04,#42,#04,#46,#04,#3c,#04
	db #3f,#04,#42,#04,#46,#04,#3c,#04
	db #3f,#04,#42,#04,#3b,#04,#3f,#04
	db #42,#04,#46,#04,#3b,#04,#3f,#04
	db #42,#04,#3a,#04,#3d,#04,#42,#04
	db #46,#04,#3a,#04,#3d,#04,#42,#04
	db #02,#04,#3b,#04,#3e,#04,#43,#04
	db #47,#04,#3b,#04,#3e,#04,#43,#04
	db #01,#02,#04,#3b,#04,#3f,#04,#42
	db #04,#47,#04,#3b,#04,#3f,#04,#42
	db #04,#01,#03,#0c,#01,#03,#00,#09
	db #0c,#0a,#ae,#9e,#09,#07,#0a,#ae
	db #9e,#09,#09,#0a,#c9,#9e,#09,#04
	db #0a,#c9,#9e,#09,#05,#0a,#ae,#9e
	db #09,#00,#0a,#ae,#9e,#09,#05,#0a
	db #ae,#9e,#09,#0c,#0a,#ae,#9e,#09
	db #0d,#0a,#ae,#9e,#09,#0d,#0a,#ae
	db #9e,#09,#0d,#0a,#ae,#9e,#09,#0d
	db #0a,#ae,#9e,#09,#05,#0a,#ae,#9e
	db #09,#05,#0a,#ae,#9e,#09,#07,#0a
	db #ae,#9e,#09,#07,#0a,#ae,#9e,#03
	db #00,#00,#00,#00,#05,#32,#00,#32
	db #80,#00,#0c,#07,#01,#49,#12,#0c
	db #00,#00,#4b,#06,#49,#0c,#47,#0c
	db #0c,#05,#01,#46,#12,#0c,#00,#00
	db #47,#06,#46,#0c,#44,#0c,#0c,#05
	db #01,#42,#12,#0c,#00,#00,#44,#06
	db #46,#0c,#42,#0c,#0c,#07,#01,#3d
	db #18,#04,#3d,#18,#05,#3e,#12,#0c
	db #00,#00,#40,#06,#43,#0c,#45,#0c
	db #47,#18,#0c,#07,#01,#4a,#18,#0c
	db #00,#00,#49,#12,#49,#06,#4b,#0c
	db #49,#0c,#0c,#0a,#01,#4d,#18,#04
	db #4d,#12,#05,#0b,#1e,#18,#1d,#18
	db #1b,#18,#19,#18,#17,#18,#16,#18
	db #14,#12,#14,#06,#12,#0c,#12,#0c
	db #13,#18,#17,#18,#1a,#18,#1f,#12
	db #1f,#06,#1e,#18,#1b,#18,#19,#18
	db #1d,#18,#0b,#36,#02,#04,#3a,#02
	db #3d,#02,#36,#02,#3a,#02,#3d,#02
	db #36,#02,#3a,#02,#3d,#02,#36,#02
	db #3a,#02,#3d,#02,#05,#0b,#36,#02
	db #04,#39,#02,#3d,#02,#36,#02,#39
	db #02,#3d,#02,#36,#02,#39,#02,#3d
	db #02,#36,#02,#39,#02,#3d,#02,#05
	db #0b,#3d,#02,#3a,#02,#36,#02,#3a
	db #02,#36,#02,#31,#02,#04,#36,#02
	db #31,#02,#2e,#02,#31,#02,#2e,#02
	db #2a,#02,#05,#0b,#3d,#02,#39,#02
	db #36,#02,#39,#02,#36,#02,#31,#02
	db #04,#36,#02,#31,#02,#2d,#02,#31
.l9ee4 equ $ + 7
	db #02,#2d,#02,#2a,#02,#05,#0b,#03
	db #0c,#01,#01,#0a,#00,#05,#09,#00
	db #06,#00,#31,#0a,#32,#0a,#35,#0a
	db #37,#0a,#35,#0a,#38,#05,#37,#05
	db #35,#0a,#37,#0a,#35,#0a,#39,#0a
	db #3a,#0a,#3b,#0a,#3c,#14,#3e,#0a
	db #41,#0a,#43,#0a,#44,#0a,#45,#0a
	db #46,#0a,#44,#0a,#45,#05,#41,#05
	db #3e,#05,#3c,#05,#3a,#0a,#38,#0a
	db #39,#0a,#03,#00,#00,#00,#00,#00
	db #35,#14,#03,#0c,#01,#01,#0a,#00
.l9f38 equ $ + 3
	db #38,#28,#00,#03,#00,#00,#00,#00
	db #05,#08,#00,#09,#00,#07,#38,#0d
	db #32,#aa,#03,#0c,#01,#01,#0a,#48
	db #0a,#48,#0a,#4a,#0a,#48,#0a,#03
	db #00,#00,#00,#00,#32,#14,#03,#0c
	db #01,#01,#0a,#41,#0a,#41,#0a,#41
	db #0a,#03,#00,#00,#00,#00,#32,#14
	db #03,#0c,#01,#01,#0a,#33,#28,#00
.l9f75
	db #03,#0c,#01,#0a,#00,#05,#09,#00
	db #21,#0a,#22,#28,#23,#28,#24,#14
	db #25,#0a,#26,#32,#1f,#28,#24,#28
	db #1d,#0a,#03,#00,#00,#00,#00,#1d
	db #14,#03,#0c,#01,#01,#0a,#2d,#28
.l9f9e equ $ + 1
	db #00,#03,#08,#01,#02,#06,#00,#05
	db #09,#00,#06,#00,#32,#0c,#31,#0c
.l9fb4 equ $ + 7
	db #30,#0c,#2f,#0c,#2e,#30,#00,#03
	db #08,#01,#02,#06,#05,#08,#03,#09
	db #00,#07,#38,#0d,#2f,#0c,#2e,#0c
.l9fcc equ $ + 7
	db #2d,#0c,#2c,#0c,#2b,#30,#00,#03
	db #08,#01,#02,#06,#05,#09,#00,#2c
	db #0c,#2b,#0c,#2a,#0c,#29,#0c,#28
	db #30,#00,#fd,#cb,#00,#76,#c8,#f3
	db #cd,#48,#a0,#38,#03,#22,#19,#a1
	db #21,#02,#c1,#22,#b1,#7a,#06,#12
	db #c5,#21,#1a,#a1,#cd,#95,#7a,#2b
	db #cd,#95,#7a,#2a,#19,#a1,#cd,#a8
	db #7a,#06,#06,#e5,#cd,#95,#7a,#23
	db #cd,#a8,#7a,#10,#f7,#e1,#06,#06
	db #7e,#23,#fe,#20,#30,#02,#3e,#2e
	db #e6,#7f,#cd,#aa,#7a,#10,#f1,#22
	db #19,#a1,#c1,#cd,#b4,#79,#02,#02
	db #00,#10,#c5,#cd,#ad,#74,#fe,#93
	db #ca,#40,#00,#fe,#58,#28,#07,#fe
	db #4d,#cc,#f3,#a0,#18,#aa,#fb,#c9
	db #c3,#52,#88,#cd,#b4,#79,#01,#19
	db #02,#41,#44,#44,#20,#3f,#00,#01
	db #00,#00,#cd,#ad,#74,#fe,#97,#28
	db #37,#fe,#9f,#28,#1f,#fe,#48,#28
	db #10,#fe,#30,#38,#ed,#fe,#47,#30
	db #e9,#fe,#41,#30,#04,#fe,#3a,#30
	db #e1,#21,#00,#a8,#09,#77,#cd,#aa
	db #7a,#0c,#18,#d6,#0d,#fa,#54,#a0
	db #e5,#c5,#21,#b1,#7a,#35,#35,#cd
	db #a8,#7a,#35,#35,#c1,#e1,#18,#c2
	db #79,#b7,#3f,#c8,#21,#00,#a8,#09
	db #36,#0d,#2b,#7e,#fe,#48,#28,#28
	db #21,#00,#00,#dd,#21,#00,#a8,#cd
	db #c6,#a0,#dd,#7e,#00,#d6,#30,#fe
	db #0a,#3f,#d8,#cd,#05,#7e,#dd,#23
	db #dd,#7e,#00,#fe,#0d,#28,#2d,#18
	db #e6,#29,#e5,#d1,#29,#29,#19,#c9
	db #21,#00,#00,#dd,#21,#00,#a8,#29
	db #29,#29,#29,#dd,#7e,#00,#fe,#3a
	db #30,#04,#d6,#30,#18,#02,#d6,#37
	db #cd,#05,#7e,#dd,#23,#dd,#7e,#00
	db #fe,#48,#20,#e3,#af,#c9,#c5,#cd
	db #48,#a0,#38,#29,#22,#0f,#a1,#cd
	db #b4,#79,#01,#18,#04,#56,#41,#4c
	db #20,#3f,#00,#cd,#54,#a0,#38,#15
	db #eb,#21,#01,#00,#73,#23,#7a,#b7
	db #28,#01,#77,#21,#01,#00,#11,#88
	db #ff,#19,#22,#19,#a1,#c1,#c9,#f3
	db #cd,#60,#79,#01,#8d,#7f,#ed,#49
	db #01,#01,#bc,#ed,#49,#01,#20,#bd
	db #ed,#49,#01,#02,#bc,#ed,#49,#01
	db #2a,#bd,#ed,#49,#01,#06,#bc,#ed
	db #49,#01,#1c,#bd,#ed,#49,#01,#07
	db #bc,#ed,#49,#01,#20,#bd,#ed,#49
	db #fd,#21,#00,#00,#ed,#5f,#47,#31
	db #00,#a8,#cd,#50,#84,#10,#fb,#21
	db #00,#01,#4d,#06,#08,#cb,#19,#17
	db #10,#fb,#77,#2c,#20,#f4,#11,#41
	db #19,#1a,#fe,#af,#20,#1b,#21,#75
	db #22,#cd,#3f,#a2,#11,#62,#26,#21
	db #21,#37,#cd,#3f,#a2,#11,#79,#62
	db #21,#79,#64,#cd,#3f,#a2,#cd,#4c
	db #a2,#21,#00,#00,#11,#01,#00,#01
	db #37,#00,#74,#ed,#b0,#cd,#60,#79
	db #cd,#b4,#79,#03,#ff,#01,#04,#02
	db #53,#43,#52,#4f,#4c,#4c,#20,#42
	db #45,#54,#57,#45,#45,#4e,#20,#53
	db #43,#52,#45,#45,#4e,#53,#20,#59
	db #2f,#4e,#00,#21,#99,#79,#cd,#7c
	db #79,#21,#a0,#7d,#22,#39,#00,#21
	db #6b,#a2,#06,#09,#c5,#e5,#cd,#b6
	db #74,#e1,#c1,#fe,#59,#28,#45,#fe
	db #4e,#28,#3c,#be,#20,#ee,#23,#10
	db #eb,#cd,#b4,#79,#01,#08,#01,#4f
	db #6b,#61,#79,#20,#43,#68,#65,#61
	db #74,#20,#2d,#20,#4c,#65,#76,#65
	db #6c,#73,#20,#43,#6f,#6e,#74,#69
	db #6e,#75,#65,#00,#cd,#b5,#7b,#21
	db #5f,#0d,#22,#cb,#72,#01,#00,#01
	db #fb,#cd,#2f,#78,#c3,#96,#a1,#3e
	db #c9,#32,#39,#8c,#cd,#b5,#7b,#cd
	db #60,#79,#cd,#b5,#7b,#cd,#3d,#78
	db #01,#e0,#00,#fb,#cd,#2f,#78,#c3
	db #60,#71,#b7,#ed,#52,#1a,#2f,#12
	db #13,#2b,#7c,#b5,#20,#f7,#c9,#21
	db #fd,#3e,#11,#70,#62,#46,#23,#7e
	db #87,#4f,#c5,#23,#7e,#2f,#77,#10
	db #fa,#c1,#0d,#20,#f5,#23,#e5,#b7
	db #ed,#52,#e1,#38,#e8,#c9,#43,#52
	db #45,#41,#54,#55,#52,#45,#53,#87
	db #2b,#5d,#37,#a6,#2b,#78,#37,#53
	db #2b,#66,#37,#72,#1a,#60,#37,#33
	db #2b,#79,#37,#4b,#29,#46,#37,#ce
	db #2d,#79,#37,#0a,#28,#46,#37,#4d
	db #2e,#46,#37,#05,#1e,#42,#37,#54
	db #28,#46,#37,#1a,#2c,#46,#37,#bc
	db #1e,#46,#37,#e0,#21,#46,#37,#ed
	db #2c,#46,#37,#a9,#2a,#46,#37,#d1
	db #1e,#46,#37,#ee,#1e,#46,#37,#94
	db #2d,#46,#37,#50,#1f,#46,#37,#28
	db #29,#46,#37,#22,#29,#46,#37,#04
	db #1f,#46,#37,#34,#28,#46,#37,#d0
	db #2d,#46,#37,#d4,#2c,#46,#37,#2a
	db #28,#79,#37,#6d,#2e,#79,#37,#22
	db #1f,#7a,#37,#9b,#19,#79,#37,#86
	db #2e,#79,#37,#3d,#27,#79,#37,#9b
	db #2e,#79,#37,#b8,#2e,#7a,#37,#ee
	db #2d,#79,#37
;
.game_name
	db "Peter Packrat",0
.game_year
	db "1988",0
.game_publisher
	db "Firebird",0
.music_author
	db "",0
.music_comment
	db "",0

	read "music_end_v1_0.asm"
